Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Delphi - [Delphi 7] Come
Forum - Delphi - [Delphi 7] Come

Avatar
Track (Normal User)
Rookie


Messaggi: 30
Iscritto: 23/01/2011

Segnala al moderatore
Postato alle 22:02
Giovedì, 16/06/2011
Salve a tutti, questa è la stringa per inviare un testo:

Codice sorgente - presumibilmente Plain Text
  1. ServerSocket1.Socket.Connections[ListView1.ItemIndex].SendText(memo1.Lines.Text);


ma mettiamo che non sia connesso a nessun Client (in questo caso è connessione inversa :P), spunterebbe un errore giusto?, ecco voglio sapere come eventualmente modificare quell'errore scrivendo per esempio "connettiti al Client prima di inviare il comando!"

Grazie in anticipo! :)

Ultima modifica effettuata da Track il 16/06/2011 alle 22:02
PM
Avatar
givex8 (Normal User)
Rookie


Messaggi: 28
Iscritto: 05/03/2011

Up
1
Down
V
Segnala al moderatore
Postato alle 14:33
Venerdì, 17/06/2011
fai così:
Codice sorgente - presumibilmente Delphi
  1. if ListView1.ItemIndex <> -1 then
  2. ServerSocket1.Socket.Connections[ListView1.ItemIndex].SendText(memo1.Lines.Text);


In questo modo non dovrebbe darti errore

Grazie!!! ;) - Track - 17/06/11 17:28
PM
Avatar
XBarboX (Member)
Guru


Messaggi: 945
Iscritto: 31/12/2008

Up
0
Down
V
Segnala al moderatore
Postato alle 9:29
Venerdì, 17/06/2011
credo che un semplice try catch basti...

Potresti farmi un esempio sull'utilizzo?, sto imparando e mi è nuova :P - Track - 17/06/11 14:15
PM
Avatar
Goblin (Member)
Expert


Messaggi: 375
Iscritto: 02/02/2011

Up
0
Down
V
Segnala al moderatore
Postato alle 13:05
Venerdì, 17/06/2011
nell'evento OnClientError del componente TserverSocket hai la gestione errori.
basta fare un doppioclick sull'evento e gestirlo, hai tutta la pappa già pronta

Ibis redibis non morieris in bello
PM
Avatar
Goblin (Member)
Expert


Messaggi: 375
Iscritto: 02/02/2011

Up
0
Down
V
Segnala al moderatore
Postato alle 15:29
Venerdì, 17/06/2011
EVVAAAIIIII :rotfl::rotfl::rotfl::rotfl::rotfl:
tre utenti 3 risposte diverse ... chi ha vinto la bambolina ?? :pat::pat:
G.

L'ha vinta givex8 :D:D - Track - 17/06/11 17:27

Ibis redibis non morieris in bello
PM
Avatar
smanettone83 (Normal User)
Pro


Messaggi: 124
Iscritto: 20/10/2010

Up
0
Down
V
Segnala al moderatore
Postato alle 20:11
Venerdì, 17/06/2011
ti basta fare cosi per gestire gli errori:

Codice sorgente - presumibilmente Delphi
  1. try
  2. ServerSocket1.Socket.Connections[ListView1.ItemIndex].SendText(memo1.Lines.Text);
  3. except
  4. showmessage('connettiti prima ad un client');
  5. end;

Ok, mi siete stati entrambi utili ;) - Track - 17/06/11 21:36
PM